home *** CD-ROM | disk | FTP | other *** search
/ Aminet 44 / Aminet 44 (2001)(GTI - Schatztruhe)[!][Aug 2001].iso / Aminet / util / cdity / CentreQuest.lha / CentreQuest / InstallCentreQuest < prev    next >
Text File  |  2001-01-06  |  1KB  |  56 lines
  1. ;Install script for CentreQuest
  2. ;$VER: 1.0
  3.  
  4. FailAt 21
  5.  
  6. Version >NIL: VERSION=39
  7. If WARN
  8.    Copy CentreQuest.guide.WB2.icon T:CentreQuest.guide.info
  9. Else
  10.    Copy CentreQuest.guide.WB3.icon T:CentreQuest.guide.info
  11. EndIf
  12.  
  13. RequestFile >ENV:CQDir DRAWER="SYS:WBStartup" TITLE="Select CentreQuest program directory" DRAWERSONLY
  14. If WARN
  15.    Skip Cleanup
  16. EndIf
  17. Copy >NIL: CentreQuest CentreQuest.info $CQDir
  18. If WARN
  19.   SetENV CQError program
  20.   Skip Error
  21. EndIf
  22.  
  23. RequestFile >ENV:CQDir DRAWER=HELP: TITLE="Select CentreQuest guide directory" DRAWERSONLY
  24. If WARN
  25.    Skip Cleanup
  26. EndIf
  27. Copy >NIL: CentreQuest.guide T:CentreQuest.guide.info $CQDir
  28. If WARN
  29.   SetENV CQError guide
  30.   Skip Error
  31. EndIf
  32.  
  33. RequestFile >ENV:CQDir DRAWER="SYS:WBStartup" TITLE="Select TestRequest program directory" DRAWERSONLY
  34. If WARN
  35.    Skip Cleanup
  36. EndIf
  37. Copy >NIL: TestRequest TestRequest.info $CQDir
  38. If WARN
  39.   SetENV CQError TestRequest
  40.   Skip Error
  41. EndIf
  42.  
  43. Lab Cleanup
  44. UnSetENV CQDir
  45. Delete T:CentreQuest.guide.info QUIET
  46. Quit
  47.  
  48. Lab Error
  49. If EXISTS C:RequestChoice
  50.   RequestChoice >NIL: TITLE="CentreQuest Installer" BODY="Error copying $CQError" GADGETS="Exit"
  51. Else
  52.   Echo "Error copying $CQError" TO "CON:////CentreQuest Installer/CLOSE/NOSIZE/WAIT" 
  53. EndIf
  54. UnSetENV CQError
  55. Skip Cleanup BACK
  56.